home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 05.zip
/
BS1 part 5
/
ANC_UTULITYS_16.adf
/
Loader.S
< prev
next >
Wrap
Text File
|
1987-01-01
|
596b
|
40 lines
move.l $4,a6
lea dosname,a1
jsr -408(a6)
move.l d0,dosbase
move.l d0,a6
clr.l d0
move.w $0100,d0
lsl.l #2,d0
add.l #prgtable,d0
move.l d0,a0
move.l (a0),d1
move.l 28(a0),d2
move.l 56(a0),d3
jsr -222(a6)
move.l $4,a6
move.l dosbase,a1
jsr -414(a6)
rts
dosbase: dc.l 0
dosname: dc.b "dos.library",0
even
prgtable:
dc.l prg1 ,prg2 ,prg3 ,prg4 ,prg5 ,prg6 ,prg7
dc.l 0 ,0 ,0 ,0 ,0 ,0 ,0
dc.l 0 ,0 ,0 ,0 ,0 ,0 ,0
prg1: dc.b "Seka",0,0
prg2: dc.b "Type Instruction",0,0
prg3: dc.b "Execute 22kB",0
prg4: dc.b 0,0
prg5: dc.b 0,0
prg6: dc.b 0,0
prg7: dc.b 0,0